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8 1 IF NOF ,LIBSWITC 
§ “1pTue SHELL PROCESS DEFINITION 
6 4 TITLE SYSSUSRVECTOR = USER ACCESSIBLE P1 CELLS 
0 F -IDENT 'V04=000' 
0 8 s euadecurersececereesqnsceceenneerencenenensennoeserennnenerceqqoseneceneeese 
7* ® 
0 3* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY © 
00 11 ;* DIGITAL EQUIPMENT EORPORATION, MAYNARD, MASSACHUSETTS. * 
000 \¢ te ALL RIGHTS RESERVED. ; 
0 14 :* THIS SOFTWARE IS FURNISHED weeee A LICENSE AND MAY BE USED AND COPIED * 
4 15 ;* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * 
0 18 ;* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THI ARE OR ANY THER * 
000 17 ;* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
000 18 ;* OTHE ON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
4 i : TRANSFERRED. . 
0000 1 :* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
0000 § 3* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
44 z :* CORPORATION. . 
0000 5 ie DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * 
0000 6 ;* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. a 
0000 4 3* * 
0000 8 ;* * 
4444 4 PRR RR ERA AEA EEA A AAA AAA ATER AAA AAAAAAEAT AAA AAAEES 
0000 1 344 
444 § 3; FACILITY: EXECUTIVE, CREATE PROCESS/SWAPPER DATA BASE 
0000 4 : ABSTRACT: sveLt DEFINES THE SWAP IMAGE FOR THE INITIAL PROCESS 
44 ; 3 STARTED BY THE CREATE PROCESS SYSTEM SERVICE. 
9909 f > ENVIRONMENT: 
44 ip : AUTHOR: RICHARD I. HUSTVEDT, CREATION DATE: 30-NOV-76 
$00 41 : MODIFIED BY: 
000 g ; 
000 43; v03-039 RASO319 Ron Schaefer 29-Jun-1984 
B85 44 ; Add queue header cells for logical name table name 
: a2 3 translation cache. 
09 23 : v03-038 LJK0287 Lawrence J. Kenah 25-Jun-1984 
48 ; Add three longword array to contain the counts of termination 
49 ; handlers declared in each of the three outer access modes. 
o 3 Add sequence number cell for process private logical name 
13 directory. 
: : v03-037 MSHO05S4 Michael S. Harvey 30-May-1984 
: 3 Remove some obsolete symbols. 
6 : V03-036 LJK0282 Lawrence J. Kenah 9-May-1984 
; Add demand zero page after P10 page to accomnodate Long 


- ey 
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-SEP=1 SYS. SRCIJSHELL.MAR; v04 
directory names that straddle page boundary. 
v03-035 aed 27-Apr-1984 


Remove CTLSGL Logra which. ves required only under the old 
Logical name design. 


v03-034 LJK0272 Lawrence J. Kenah 10-Apr-1984 
Add image activator context cess $ privileged’ vectors 
and shareable image initialization. 


v03-033 MHB0133 Mark Bramhall 99-Apr-1984 
Remove preset values for CTLST_USERNAME Awy Crist ACCOUNT. 
Validate CLI information ordering. 


v03-032 RASO0281 Ron Schaefer 28-Mar-1984 
Add PIOSGB_DFNBC process-specific RMS parameter for 
network _pldck =, ——- size 
Re-use cell o sed foe m RMS Compatibility. 


Add aay _SPAWNCLI “end CTLSGT. SPAWNTABLE as well. 
v03-031 wMCc0006 Wayne Cardoza 21-Mar-1984 
Go back to 3 pages of kernel stack. 
Add esti for default image 1/0 aree. 
V03-030 MSHO006 Michael S. Harve 3-F eb-1984 


Protect image header buffer pase ‘ soainst USER WRITE. 


Protect image activator scratch page from user by changing 
its owner to EXEC. 


Replace obsolete image rundown control flags with an image 
List pointer for use by the debugger. This fixed cell pointer 
allows the debugger to avoid Linking against the executive. 


V03-029 RSHO091 R. Scott Hanna 31-Jan-1984 
Add dedicated P1 demand zero pages for the security auditing 
Impure Data Table (IDT). Remove the old vector page pointer 
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38 to the IDT. 
00 v03-028 LJK0258 Lawrence J. Kenah 18-Jan-1984 
00 Correct problems satrocuces by LJKO257. In SHELINIT, only 
00 reorder a number of pagesequal to the pages in this module 
00 that are NOT kernel stack pages. Convert a PIO page from 
8 a page file page to demand zero. 
v03-027 BLS0262 Benn Schreiber 16-Jan-1984 
Correct .ADDRESS to be .LONG te Pi lookaside List links 
v03-026 LJK0257 Lawrence J. Kenah 44-Jan-1984 
A variety of changes. 


Add CTL$GQ_TERMCHAR and CREPRC_FLAGS to P1 vector page. 
Add UAF_FLAGS to CLI data page. 
Change PQBSC_MAXDIRLEN references to PQB$S_DDSTRING. 


== —§ 2QOODOGO0000 000000000 00909 09 09 09 09 09 09 C9 09 SII NINN NSN NNO AA AAAAAAOUIN 
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Add second page for compatibility mode context. 
Reorder SHELL pages to achieve demand zero compaction. 
eqs saeeses and demand zero pages for P1 pool lookaside 


Move page file index and characteristics from PQB to PCB. 


Add symbol P1oss” EODSTR fo apecify the Length of the 
$EOD string for SYSSINPUT 


v03-017 LJK0208 Lawrence J. Kenah 26-May-1983 
Add Listheads for image control block lists to image 
activator context page. Change name of image activator 
work area. 


V03-016 RSHOO17 Sco 21-May-1983 
Change CTLSGL AUDI TEMAN ‘. eCTLSGL -NSA_IDTPTR. This cell 
contains a pointer to the security audi + ing impure data 
table. The audit channel number is now in the 


v03-015 PCA1016 i gs Anegnestenoules 28-Apr-1983 
Add CTLSAG CLITABLE. two Longyore s which sper ity the 
virtual address range into which the CLI table is mapped. 


v03-014 GAS0122 Gerry Smith 14-Apr-1983 
Add CTL$GQ HELPFLAGS two ton words of information on 
surrens heTp settings Also double the size of the 
supervisor stack, to 32 pages. 


v03-013 RSHO012 t Hanna 13-Mar-1965 
Add the cell cTL Bat SOS TCHAN to store the security 
audit trail journal“channel number. 


° v03-025 wMc0005 Wayne Cardoza 02-Dec-1983 
PHDSW_BAK, PHDSW_WSLX are now longwords. 

6 V03-024 wMC0004 Wayne Cardoza 28-Nov-1983 

° Move the kstack expansion WSL slots. 

0 v03-023 wMc0003 Wayne Cardoza 13-0ct-1983 

0 Reserve space for 4 extra kstack pages. 

5 v03-022 LJK0251 Lawrence J. Kenah 7-Sep-1983 

Add CLI mame counted string to CLI data page. 

0 v03-021 LJK0246 Lawrence J. Kenah 24-Aug-1983 

0 Add cell to Pl pointer page that records the size of the 

4 user stack. 

0 v03-020 wMc0002 Wayne Cardoza 22-Aug-1983 

Temporarily increase kernel stack to 4 pages. 

0 V03-019 LJK0239 Lawrence J. Kenah 1-Aug-1983 

Increase size of exec stack to 16 pages. 

v03-018 RASO159 n Schaefer 22-Jul-1983 

0 
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v03-012 RSHOO02 Scott Han 99-Feb-1983 
aoe Loe. RDIPTR’ to anert nights database system 


V03-011 KBT0454 Keith B. Thompson 7-Jan-1983 
Make directory cache 2 pages due to long directory names. 


V03-010 JwHO138 Jef trey W. Horn 29-Nov-1962 
Fix problems related with movement within gh : 
vector page introduced by JWHO118 and DMwW4008. 


V03-009 JwWwHO118 Jeffrey W. Horn 19-Nov-1982 
rr RMS Impure Areas. Add cells «Ys to 
pusegrt Pl allocation routines. Eliminate the 
Process I0 segment and the Process A Location 
Resta from SHELL, now created in PROCSTRT. 


V03-008 DMwW4008 DMWalp 12-Nov-1982 
Add definations for new logical name structures. 


v03-007 wmMc0001 Wayne Cardoza 19=0c t-1982 
Add support for specifying desired page file. 


V03-006 JWHO001 Pa Hy or W. Horn 27-Aug-1982 
dd cells needed niet RMS Recovery Units. 
PIOSGL_RULOCK and *B10$ NXTIRBSEQ. 


v03-005 CDS0001 C Sae 13-Aug-1982 
Define CTLSGL _F1iBKOP. nett to dispatch to XP. 


V03-004 LJK47269 Lawrence J. Kenah 10-Aug-1982 
Change protection on image activator scratch pages to 
UREW. Remove SPRDEF. 


V03-004 KDM46395 Kathleen D. Morse 28-Jun-1982 
Increment the PTWSLELCK byte array for the P1 system 
service vector pages, which are WINDOW PTEs. 


v03-002 KDM0002 Kathleen D. Morse 28-Jun-1982 
Added S$PRDEF. 
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LONG SYM!WSLSM_VALID!WSLSC_'TYPE ; SET VALID BIT 
-ENDM = =WSL 


~ 


«MACRO CTL SYM 
vIF NOF ,LIBSWITCH 

CTLS'SYM== =CTLVECPAG+VECTORS 

CTLS'SYM=.-CTLVECPAG+VECTORS 
ENDC 


~ENDM =CTL 

~-MACRO PHD SYM 

»=PHD...+PHDS'SYM 

-ENDM = PHD 

«MACRO PIO SYM ; DEFINE PROCESS 1/0 SEGMENT SYMBOL 
PIO$'SYM==P10BASE+<.=P10> ; 

-ENDM PIO 

»MACRO_ PIOL SYM ; DEFINE PROCESS I/0 LOCAL SYMBOL 
Po ee ee : 


~MACRO PIO2 SYM ; DEFINE PROCESS I/0 LOCAL SYMBOL 
P102'SYM=PIOTBL+<.-TBL> 
ENDM PI02 
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; PIPTE = GENERATE PTES FOR CONTROL REGION PAGE TABLE 


~MACRO PIPTE NUM,ACCESS=NA,OWNER=K,STATE,SYM 
IF NB,SYM 


SYM=VA... 
-ENDC 


-REPT NUM 
7 1DN <STATE>, <VALID> 
.=<la3i> 


OoOooooo 


SOOOCSCOOSOSOOOSOOOOOOOOOOOOOOOoOoOO: 


GCNT=PFILPGCNT#+1 


ov 


ION, <STATE>,<PFIL> 

.=PTESM 

GCNT=PFILPGCNT+1 
PTESC_"ACCESS!PTESC_‘OWNER'OWN! TMP... 


F 
Pp 
F 
Pp 
N 
, ION, <STATE>,<DZRO> 
N 
F 
P 
l 


4 
VA. . =VA, . -7*xX200 
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4 
5 IF F ,LIBSWITCH ; FOR USRVECTOR 
: -PSECT ABS$,ABS + DO NOT GENERATES Ee FORAGE 
: TIFF : ELSE, 
40 .PSECT AEXENONPAGED 
41 SWPSGL_SHELIO:: : 1/0 PAGE COUNT FOR SHELL 
4e .LONG  SWPSC_SHELLSIZ : 
ee WARNING: SWPSC_SHLP1PT MUST BE MANUALLY COMPUTED SINCE IT IS USED 
45 : TOA LCOCATE THE SPACE FOR P1 PAGE TABLE ENTRIES. IF UPDATES 
46 : ‘WADE THAT INTRODUCE MORE P1 PAGE TABLE ENTRIES 
4 3 VERIFY THAT THEY STILL FIT IN THE NUMBER OF PAGES PROVIDED 
i éupsc -SHLPIPT= =2 : COUNT OF BASIC P1 PAGE TABLES FOR SHELL 
50 -PSECT YYSHELLPAGED,PAGE : SHELL AT END OF PAGEABLE EXEC 
51 SHELL: : BASE OF SHELL SWAP IMAGE 
52 SUPSGL_SHELLBAS:: : 
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SHEL PROCESS DEFINITION 16-SEP-1984 01:11:32 VAX/VMS Macro v04-0 P 9 SH 
vou-000 SHELL PROCESS HEADER Breen bhe As iabiae POLMRS acre VOb=00 ~~ a vo 
‘ ' .SBTTL SHELL PROCESS HEADER 
5 ; PROCESS HEADER FOR SHELL PROCESS 
0000000 § PHD.... : BASE OF PROCESS HEADER 
itdssbeg 60 .BLKB = PHDSC_LENGTH + RESERVE SPACE FOR HEADER 
fe 
7¢ e§ ; WORKING SET LIST 
17¢ 69 : PAGES DESCRIBED IN THE WORKING SET LIST MUST OCCUR IN THE SAME ORDER 
17 66 ; WITHIN THE PROCESS BODY 
17¢ «= 368 ALIGN LONG . ¢ AT LONGWORD RESOLUTION 
90000055 17¢ $9 SWPSC _KSTACK eX Ustzs<, -PHD...>@-2 
Seas 17¢ 0 ~-BLKC 9 “KSTACK_EX : EXTRA SLOTS FOR KERNEL STACK EXPANSION 
000001 g 18¢ 71 WSL...=. : BASE OF WORKING SET LIST 
00000063 018¢ a SWPSC_KSTACK_WSL==<.-PHD.. 
O18¢ 7 WSL eeK SPIN 2eieel >>! WSLSM_WSLOCK>, PROCESS; KERNEL STACK PAGE 1 
19 74 WSL <<KSPINI-<2#512>>!WSLSM_WSLOCK>, PROCESS: KERNEL STACK PAGE ; 
0194 75 WSL <<KSPINI~<3#512>>!WSLSM_WSLOCK>, PROCESS: KERNEL STACK PAGE 
00000198 0198 76 NOT_KSTACK_WSL=. SL_1§ NOT KERNEL STACK 
0198 7 wsc <VECTORS !WSLSM_WSLOCK>, pRocess : VECTO 
0000019¢ 019C 378 DYNWSL=. F DYNAMIC WORKING SET 
19¢ 13 WSL <PIOBASE !WSLSM_MODIFY>, PROCESS ; PROCESS 1/0 SEGHENT BASE PAGE 1 
000001A0 1A0 81 FWSL.. ; FREE WORKING SET LIST 
00000001 1A § NDYNZ<FWSL.. .<DYNWSL>@-2 NUMBER OF DYNAMIC ENTRIES IN SHELL 
00000002 140 8 SHUFFLE COUNT=<FWSL...-NOT_KSTACK _wsL>a-é : AMOUNT OF SHUFFLING BY SHELINIT 
00000001 O1A 4 SWPSC_ poe N==NDYN ; GLOBAL NAME FOR NUMBER OF DYNAMIC PAGES 
1A0 385 IGN PAGE : CET 10 END OF PAGE 
00000200 00 : SAV... F 
00000067 6 3 : TMP. ..=<DYNWSL-PHD...>a-2 ; BASE OF FLUID WORKING SET LIST 
020 90 PHD W_WSLOCK : POINTER TO START OF LOCKED PAGES 
0067 0 oC 31 .WORD TAP... ; 
O9¢ 98 PHD W_WSDYN : POINTER TO START OF DYNAMIC PAGES 
0067 9 34 .WORD TAP... : 
1 %6 PHD W_WSLIST ; 
0063 0 9 .WORD <QSL...-PHD...>a-2 : START OF WORKING SET LIST 
A 38 HD W_WSNEXT + NEXT WORKING SET ENT RY 
0067 : 4 eWORD <TMP...+NDYN-1> : 
- 4 9 PHD L_FREPIVA ; VA OF FIRST FREE PAGE IN P1 SPACE 
7FFEO000' ? ? § «LONG VA...-512 3 
4 404 PHD Q PRIVASK ; ENABLE ALL PRIVILEGES 
FEFFFFFFE FRFFEFFE 4 5 .LONG -T,- F 
4 $ PHD W QUANT : QUANTUM OF ONE SECOND 
FFOC ¢ 4 8 .WORD TO : 
E 410 PHD L_KSP : STACK POINTERS 


V0e=600 


04000000 


00000000° 
00020000 
00000000 
FF 800000 

0 


OO1FFFOI 


Omcc 


FFFFFFOO’ 8 


0004 00 
0 


03 
00000200 


oo 
PAOOWUWANSIN SE FW oD 
— OMNI FOO fLOOoMoe 


ne 


PEPE LEEPER EEE 


FHSAA POPPIN PO OO es 


“nz 
me 


WIN 9 OD NOUEL WN 0 OONOUES WH OOONOMS wn I- 


a tt 
PRES 
ONO 


me 


>oO 
o2 


» LONG 
~ LONG 
- LONG 
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- LONG 


PHD 
. LONG 
Pp 


HD 
- LONG 
PHD 
«LONG 


PHD 
- LONG 


PHD 
- LONG 


PHD 
- LONG 


PHD 
- WORD 


PHD 
«WORD 
PHD 
-BYTE 


PHD 
-BYTE 


e=SAV... 


"SrSEP=1986 83:47: 


TESPROCSTRT 


‘orp mo 


4 


i ar Cree me 


POLRAS 
@PHD 
PIBR 
Z1a25> 
L_PILR 


<Ta21>=P1PTLEN 
L_FREPTECNT 


@21 +<<18 1-VA, ee 


W_PRCLM 

4 
W_WSFLUID 
10 


DFPFC 
6 


B 
1 
B_CPUMODE 
PSLSC_USER 


it ASTOELEPSL SV. IPL 


ty TAsTLVL 


X/VMS Macro V04-0 Pa 1 
ag PONCMES Saeco, VOs50 vet) 
; KERNEL STACK POINTER 
EXECUTIVE STACK POINTER 
SUPER STACK POINTER 
NO INITIAL USER STACK 
INITIAL PROGRAM COUNTER 
START PROCESS 


PROGRAM STATUS LONGWORD 
T RUN AT ASTDEL 

PO BASE REGISTER 

RELATIVE OFFSET 


NO AST PENDING, POLR = 0 

SVA OF P1 PAGE TABLE BASE 

P1 LENGTH REGISTER 

eg PTE'S BETWEEN PO AND P1 PT 


(NUMBER OF AVAILABLE LONGWORDS 


SUB tery LIMIT 
ALLOW F 


GUARANTEED FLUID PAGE COUNT 
GUESS AT TEN FOR NOW (WAG) 


DEFAULT PAGE FAULT CLUSTER 

ACCESS MODE FIELD FOR CPU TIME LIMIT 
EXPIRATION AST STARTS WITH USER MODE 
RESTORE LOCATION COUNTER 


n 8 
SHEL PROCESS DEFINITION 16-SEP-1984 01:11:32 VAX/VMS Macro V04-00 Page 
Soe ¢bo0 SHELL PROCESS PAGE TABLES green 138 Bh: b 338 YeyS. SRCJSHELL MAR; 1 . 
4 .SBTTL SHELL PROCESS PAGE TABLES 
452 : 
4 3: SHELL PROCESS PAGE TABLES 
4 5: 
00000200 i37 PIPTBAS=. : 
900040 23 TMP=<SWPSC_SHLP1PT#512> : ALLOCATE SPACE FOR PAGE TABLES 
9000 69 460 .BLKB TMP + ALLOCATE SPACE FOR PAGE TABLES 
00000 4 : SAV... ; REMEMBER BASE OF PAGE TABLES 
600 4 FTE : ASSEMBLE FOLLOWING FOR BOTH 
600 464 : SHELL AND USRVECTOR MODULES: 
$00 eee 
690 68f : INITIALIZE VIRTUAL ADDRESS BASE 
80000000 60 4$9 7 VA...=1831 : 
$00 471 ; PIPTE 128*DBGPTCNT ; DEBUGGER CONTEXT AREA 
7FFFOOOO 0600 42g VA...2VA...=<DBGPTCNT#128*512> : ACCOUNT FOR IT IN VA... 
7FFFOOO0 0600 473 DBGAREA=VA... : ADDRESS ai DEBUG AREA 
00 47% IPTE 1, URKW,K,PFIL + VECTOR PAGE 
7FFEFEOO oF 479 VECTORS=VA... ; 
O3re ci? .IFF : ASSEMBLE REST ONLY FOR SHELL MODULE: 
7FFEFEOO O5FC t38 CTLSGL_VECTORS==VECTORS ; BASE OF VECTOR PAGE 
O5FC 480 PIPTE 16 : PAGES FOR SYSTEM SERVICE VECTORS 
7FFEDEOO O58C 481 PISYSVECTORS==VA... 
5B¢ 48¢ PIPTE SSTACK,URSW,S,DZRO,SSPINI : SUPERVISOR STACK 
53¢ 48 1PTE ESTACK, SREW,E.DZRO.ESPINI ; EXECUTIVE STACK 
SFC 484 PIPTE KSTACK, SRKW.K,PFIL ,KSPINI KERNEL STACK 
7FFE7800 ar 485 CTLSGL -KSTKBAS==VA. ; MAXIMUA TOP OF KERNEL STACK 
4FO 486 PIPTE KSTACK _EX,NA,K,PFIL EXPANSION FOR KERNEL STACK 
7FFE7000 0460 487 CTLSGL _KSTKBASEXP==VA ed : MAXIMUM TOP OF EXPANSION KERNEL STACK 
7FFE7EQO 0460 4 : CTLSGL-KSPINI==KSPINI : ONITIAL KERNEL STACK 
4E0 4 TE ; NULL STOPPER PAGE 
40¢ 490 PIPTE KRP_COUNT,URKW.K,DZRO ; P1 LOOKASIDE LIST FOR KERNEL MODE 
7FFE6600 O04CC 491 CTLSGL “KRPESVA.. + ADDRESS USED BY PROCSTRT TO FIND IT 
4C 49¢ 1 ,URSW,E,DZRO : IMAGE HEADER Bue 
7FFE6400 04€8 49 RAGSINGHDRBUF = ==VA... : ADDRESS OF IMAGE HEADER BUFFER 
468 49% 2,UREW,K,DZRO t VECTORS FOR USER $ $ SRV S 
7FFE6000 04CO 495 CTLSA_DISPVEC==VA “i + ADR OF VECTOR AGES FOR SYS SRV/ERRMSG 
¢ 496 : DEBUGGER CONTEX Kt 
48 49 PIPTE imGAETBUF, Grew. E,DZRO : IMAGE ACTIVATOR SCRATCH PAGES (8) 
7PEFE4BOO 49 498 1A CSAL IMGACTBUF==V VA... : ADR OF IMAGE ACTIVATOR SCRATCH PAGES 
9 0 PiPYe ’"12,URSW,S.DZRO ; COMMMAND INTERPRETER DATA PAGES 
7FFE3000 046 1 CLIDATAPAG=VA... : BASE ADDRESS OF CLI DATA PAGE 
cieenee if g mE 1,UREW.E,DZRO : IMAGE ACTIVATOR CONTEXT 
= eee 
4 4 PIPTE NSASK_IDT_PAGES,KW.K,DZRO ; SECURITY AUDITING IMPURE DATA TABLE 
7FFE2800 436 5 NSAST_IDT==VA... 
45 PIPTE 2 : UNUSED PAGES 


B 9 : 
SHEL PROCESS DEFINITION 16-SEP-1984 01:11:32 VAX/VMS Macro v04-0 SHE 
vou-000 SHELL PROCESS PAGE TABLES eet Bh be Yee eeHBGEe Bancy voé 
44 73 
44 ; THE FOLLOWING PAGE IS A USER-MODE WRITABLE CONTEXT PAGE 
44 : FOR MISC. USER=MODE PACKAGES THA ARE MAINTAINED BY VMS. 
4 ; (SEE DETAILED ALLOCATION OF PAGE BELO 
44 is” PIPTE 1,UW,K,DZRO : GLOBAL USER-MODE OWN STORAGE PAGE 
7FFE2200 44 13 UWVECPAG=VA... 
444 515: THE FOLLOWING PAGE IS A WRITABLE CONTEXT PAGE FOR 
46 1 ; THE USE OF THE COMPATIBILITY MODE EMULATOR AND EXCEPTION 
444 18 ‘ PIPTE 2,UW,K,DZRO ; WRITABLE PAGES FOR COMPATIBILITY MODE 
7FFE1E00 4 ¢ 19 CTLSAG_CMEDATA==VA... ; 
43¢ 1: THE FOLLOWING PAGES ARE FOR USE BY BASIC/BASIC-PLUS TO PROVIDE 
43¢ : : THE "'CORE COMMON REQUIRED TO PASS DATA WHEN CHAINING FROM IMAGE 
43¢ ; TO IMAGE. AN IDENTICAL AREA, NEGATIVELY DISPLACED HAS BEEN ALLOCATED 
‘ ¢ 4 ; FOR USERS AN ND css. 
43C H s ? PIPTE COMMON,UW,K,DZRO ; DEC "CORE COMMON’ PAGES 
7FFE1600 042¢ CTLSA_COMMON==VA. . t BASE ADDRESS 
42c 8 PIPTE COMMON, UW, DZRO : USER "CORE COMMON'' PAGES 
4i¢ 9 PIPTE  1,UREW.E,DZRO t PROCESS IFB/IRB TABLES 
7FFEOCOO 041 0 PIOTBL=VA... 
418 1 PIPTE  2,UREW,E,DZRO ; RMS DIRECTORY CACHE PAGES 
7FFEOB00 0410 : PIOSA_DIRCACHE==VA... — 
410 1 ,UREW,E,DZRO ; RMS TRACEPOINT PAGE 
7FFEQ600 040C¢ 3 4 PIOSA_ TRACES= VA. 
40¢ 5 PIPTE 1,UREW,E,DZRO ; EXTENSION TO RMS POINTER PAGE 
408 : PIPTE 1.UREW.E,PFIL + RMS POINTER PAGE 
7FFEO200 0404 PIOBASE=VA... ; 
7FFE0200 404 : USPINI=VA... t USER STACK AREA 
00000404 404 40 END...=. ; END OF CONTROL REGION 
000000F F 0404 4g PIPTLEN=<1@31-VA...>a-9 ; ENTRIES IN P1PT 
00000081 04 4 44 SWPSC_SHLFPTE==<<.-PIPTBAS>@-2> ; FREE PIPT IN BASIC P1 PAGE TABLES 
% 4 46 : RESTORE LOCATION POINTER 
00000600 0404 48 : .=SAV... : FINISHED WITH PAGE TABLES 
00000068 0600 54 PF ILPGCNT=PF ILPGCNT-KSTACK=1 : NO PAGE FILE FOR KERNEL STACK OR VECTORS 
0000006 0600 30 SWPSC_SHELLPF IL==PFILPGCNT : DEFINE GLOBAL VALUE FOR SHELL PAGE FILE 


ie 
v04-000 BODY 


00000600 


00000600 


00000600 
0000 


0000 


00000000 
00000000 


7FFE7800 
7FFE7EOO 


~~~ 
aa 
Sa aa na 
mmm 
ovo ono 
romm 
ooo 
ooo 


~-SBTTL BODY OF SHELL PROCESS 
BODY OF SHELL PROCESS 


IFT 
-=VECTORS 
FTF 

CTLVECPAG=. 
CTL GW_NMIOCH 
<WORD 0 
CTL GW_CHINDX 
<WORD 0 
CTL GL_LNMHASH 
. LONG 
eTL GL_LNMDIRECT 
. LONG 


ARRAY OF STACK POINTERS 


: THE -1 ENTRY OF CTLSAL_STACK IS 
: EXTENT OF THE KERNEL STACK. 


OOOO O00 OO 0009 090909 09 09 09 09 09 098 SII NINN NN NNO PAA AAA AAAOUMINIINIVII 


CTL S$ 

LONG KSPINI 
-LONG ESPINI 
LONG SSPINI 
LONG USPINI 


CTL GQ_LNMTBLCACHE 
-LONG CTC$GQ_LNMTBLCACHE 
-LONG CTLSGQ"LNMTBLCACHE 


DOONAN EWN OS OD NAME WIN 9 OO NAME WN OS OOO NAME WIN 9 OO NA UE WWI OOONOUSW U-4 


aan 


¢ 9 
ROCESS "SSEp=1986 88: 


pide USYSYSRcShecL mans 


o2SAV... ; POSITION TO END OF HEADER 

; VECTOR PAGE 

: serene NOTE: The cells in this page must not move. There are 
3 retee facilities which locate cells via offsets from 

; rtere the fop of this page. If you delete a cell 

: etree subsitute a .LON and comment it as SPARE. If 
: retre you add a cell either replace a SPARE cell or 

: eeree add it to the end. 


; IF USRVECTOR MODULE 
: SHOW ACTUAL ADDRESSES IN LISTING 


; ASSEMBLE FOLLOWING FOR BOTH 
; SHELL AND USRVECTOR MODULES: 


; BASE OF VECTOR PAGE 
; NUMBER OF CHANNELS 
; FILLED IN IN PROCSTRT 


; MAXIMUM CHANNEL INDEX 
; FILLED IN IN PROCSTRT 


; process Logical NaMe HASH table 
3 pointer 

; process Logical NaMe DIRECTory 
; pointer 


USED TO DETERMINE THE MAXIMUM 


; MAXIMUM TOP OF KERNEL STACK 
; STACK POINTER RESTART ARRAY 
; K STACK POINTER 

ACK POINTER 

SOR STACK POINTER 
ACK POINTER 


Sete Ge Ge eee 
mn 
=< 
mn 
nn 
=~ 


; USER ST 


ME TABLE 
LINK) 
NK) 


; QUEUE HEAD 0 
Tl 


: TRANSLA 


ER FOR L 
ON CACHE 


Page 13 
. (1) 
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SS DEFINITION 16-SEP-1984 O4:) :32 VAX/VMS Macro v04-0 Page 14 
OF SHELL PROCESS ~SEP=1984 03:47:44 «SRCJSHELL MAR; (1) 
6 10; 
° i ; THE FOLLOWING THREE VECTORS MUST BE ADJACENT 
6 13° 
? 614 CTL GL_CMSUPR ; SUPERVISOR CHANGE MODE DISPATCHER 
00000000 ose HF LONG ; NULL 
62C 819 CTL GL.CRUSER ; USER CHANGE MODE DISPATCHER 
00000000 6 ets ~ LONG 3 NULL 
6 620 CTL GL_CHHANOLR : COMPATIBILITY MODE HANDLER 
00000000 ? ? 1 LONG 
634 6 i TL AQ_EXCVEC ; PRIMARY/SECONDARY EXCEPTION VECTORS 
00000 634 624 LONG 0 ; KERNEL MODE PRIMARY 
00 8 638 625 LONG 3 KERNEL MODE SECONDARY 
00 63C 6 § LONG ; EXEC MODE PRIMARY 
i444 4844 640 6 LONG 3; EXEC MODE SECONDARY 
44 0 0644 628 LONG ; SUPERVISOR MODE PRIMARY 
0000000 0648 629 LONG ; SUPERVISOR MODE SECONDARY 
00000000 ook 630 LONG QO ; USER MODE PRIMARY 
00000000 peat oa) LONG 0 ; USER MODE SECONDARY 
654 834 L GL_THEXEC : EXECUTIVE TERMINATION HANDLER 
00000000 tr e35 LONG 0 3 NULL 
$38 6 § L GL_THSUPR ; SUPERVISOR TERMINATION HANDLER 
00000000 0638 o3/ LONG 0 3 NULL 
065C o38 : CTL GL_THUSER ; USER TERMINATION HANDLER 
00000000 eh ey -LONG OQ 3 NULL 
dee0 666 : FORMER LOCATION OF COMPATIBILITY MODE CONTEXT 
66 64 CTL GQ_COMMON ; CORE COMMON DESCRIPTOR 
00000800 0660 644 -LONG 512*COMMON ; SIZE IN BYTES 
7FFE1600 BoGs $2 -LONG CTLSA_COMMON ; AND ADDRESS 
0668 805 CTL GL_GETMSG ; PER-PROCESS VECTOR TO USER MESSAGE 
00000000 beee on8 -LONG 0O ; DISPATCHER 
066C 650 L AL_STACKLIM : STACK LIMIT ARRAY (INDEXED BY MODE) 
7FFE7800 poge 651 LONG CTC$GL_KSTKBAS 3 KERNEL STACK LO (TOP) LIMIT 
7FFE7EOO 06 $36 LONG KSPINI 3; EXEC STACK LO (TOP) LIMIT 
FFE EOO 674 $3 . LONG pSPINI 3; SUPER STACK LO (TOP) LIMIT 
00000 ore O38 . LONG : USER STACK (NOT CHECKED) 
67C 636 CTL GL_CTLBASVA ; BASE CONTROL REGION ADDRESS 
00000000 of 6 LONG 0 ; FILLED IN BY PROCSTRT 
6 $38 CTL GL_IMGHDRBF ; ADDRESS OF IMAGE ACTIVATOR'S IMAGE 
6 660 ; HEADER BUFFER, IF IMAGE IS ACTIVE; 
00000000 $6) -LONG 0 : O IF NO IMAGE ACTIVE 
684 4 CTL GL_IMGLSTPTR ; ADDRESS OF ICB LIST (FOR DEBUGGER) 
7FFE2ZE7C" ° 4 i -LONG JACSGL_IMAGE_LIST 
6 ; 666 CTL GL_PHD ; ADDRESS OF PHD WINDOW 


ee a eee ee ee 


= 


SHEL PROCESS DEFINITION 1 
vos+600 BODY OF SHELL PROCESS : 
00000000 8 ih .LONG 0 
ris CTL Q_ALLOCREG 
00000000 00000000 ¢ i . LONG 80 
94 re TL GQ_MOUNTLST 
7FFEFE94 0694 67 .LONG CTC$GQ_MOUNTLST 
7FFEFE94 698 674 “LONG CTLS$GQ“MOUNTLST 
69C 676 
69C 67 
aa 
69C 680 
69C $8) CTL T_USERNAME 
000006a8 69 68¢ .BLKB = JTB$S_USERNAME 
6A 84 CTL T_ACCOUNT 
. 00000680 i oe -BLKB J TB$S_ACCOUNT 
680 6 
680 688 
0680 689 CTL GQ_LOGIN 
00000000 00000000 oes 690 .LONG 0,0 
068 69¢ CTL GL_FINALSTS 
00000000 0688 69 .LONG 0 
06BC 69% 
6BC 695 CTL GL_WSPEAK 
00000000 6B 696 .LONG 0 
6CO 69 
06C0 698 CTL GL_VIRTPEAK 
00000000 60 $99 .LONG 0 
6C4 Ot CTL GL_VOLUMES 
00000000 6C4 108 .LONG 0 
dec8 £04 CTL GQ_ISTART 
00000000 00000000 06¢8 705 .LONG 0,0 
0600 £06 
9600 707 CTL GL_ICPUTIN 
00000000 06D 708 . LONG 
604 709 
6p4 710 CTL GL_IFAULTS 
00000000 6p 1] . LONG 
es a CTL GL_IFAULTIO 
00000000 608 at . LONG 
ep 216 CTL GL_IWSPEAK 
00000000 6p 4 . LONG 
6E 19 CTL GL_IPAGEFL 
00000000 GE f 0 . LONG 
64 7 g CTL GL_1D1OCNT 
00000000 0664 7 . LONG 


be Obbbiee ESE YSRCHEEL mans | 


; INIT BY INSWAP 


Page 15 SHI 
. (1) vo 


HEAD OF PROCESS ALLOCATION REGION POOL 
(Filled in by PROCSTRT) 


; MOUNTED DEVICE LIST 
WARD 


FOR K 
BACKWARD LINK ( LIST EMPTY ) 


FRRARAAAAARATER AAA EAE AEE AAA AREA AAAAAAERAAAAERAERAAARAARAEREAAAERARAERAAEARAEEE 
; NOTE: The order of the accounting data between CTLST_USERNAME and 
; CTLST_REMOTEID should be preserved! 


o 
PRRAAAAAKAAAAT A eee AAA KAAAAAAAAAAAAAAAAAARAAAAAA AAA TAA HATA eee Ke eeeeeeeet 


USERNAME 
Filled in by PROCSTRT 


ACCOUNT NAME 
Filled in by PROCSTRT 


ASSUME <CTLST_ACCOUNT = CTLST_USERNAME> EQ <JIBST_ACCOUNT = JIBST_USERNAME> 


SYSTEM TIME AT PROCESS CREATION 


FINAL EXIT STATUS FOR PROCESS 


PEAK WORKING SET SIZE 


PEAK VIRTUAL SIZE 


COUNT OF VOLUMES MOUNTED 


IMAGE ACTIVATION TIME 


INITIAL IMAGE CPU TIME 


INITIAL IMAGE FAULT COUNT 


INITIAL IMAGE FAULT 1/0 COUNT 


IMASE WORKING SET PEAK 


IMAGE PAGE FILE PEAK USAGE 


INITIAL IMAGE DIRECT 1/0 COUNT 


Le — —_—_———_———4y = 


PRO 
BOD 


00000000 


00000000 
P? 

000006F 
00 

OOO006FE 


00 
0000070F 
00000710 


FFFFFFFF 
00000000 
00000000 


00000000 
00 


00000798 


xm 
mw 
mH 
> pany 


NNN NNN NNN NSS SENSIS AAO OOOOOOSOAOSAOOOOS NM 


PIPIPIPIPININININIDS) a a 0 TF PT Terev ee 
DWOUIULS SOOM OO WDDBWDOOCCOCOCOS TT HMMM OIIN—OOOOMOOM@Me vO 


CGOOOOOCOOOOOOOCSCOOCOCOCOCOCOCOCOCOCOSOOOOOOOSOOOOOOOOOOO OM 


TL amend 
- LONG 
CTL Perens 
- LONG 

TL T_NODEADDR 
-BYTE Q” 

~BLKB 6 
CTL T_NODENAME 
-BYTE OQ” 

-BLKB 6 

TL T_REMOTEID 
BYTE GC 

-BLKB 16 

-BLKB 1 


yh ogee get preening ere 


3; End of adjacent accounting data 
Seeeeeeeeeeeeeereeteeereeeeeeeeee 


CTL GQ_PROCPRIV 
.LONG = =15-1 

CTL GL_USRCHMK 
.LONG 0 

CTL GL_USRCHME 
.LONG 0 

CTL L_POWERAST 
. LONG 

eTL GB_PWRMODE 
.BYTE 0 

CTL GB_SSFILTER 
-BYTE 0 

“BLKB 2 


F 9 
Ocess "SrSEP=1986 Os:ariag ESvsvSACHSNELL OMAR; Sey! | 


; INITIAL IMAGE BUFFERED 1/0 COUNT 


INITIAL IMAGE VOLUME MOUNT COUNT 


REMOTE NODE eit ty ame 
; BYTE me ton TE 
; 6 BYT 
— a8 a pratt? 
YTE COUNT BYTE 
; 6 CHARACTERS MAX 
REMOTE ID 
; BYTE COUNT BYTE 
; 16 CHARACTERS MAX 


LONGWORD ALIGN SECTION 


PROCESS PRIVILEGE MASK 
ALL PRIVILEGES PERMITTED 


PER-PROCESS VECTOR TO USER CHANGE MODE 
TO KERNEL HANDLER 


PER-PROCESS VECTOR TO USER CHANGE MODE 
TO EXECUTIVE HANDLER 


POWER FAIL AST ADDRESS 
ACCESS MODE FUR POWER FAIL AST 


SYS SERV INHIBIT FILTER MASK 
SPARE 


oo 


"SSEp=19be Ob:aPing USNS SaCHSRELL UMAR: teal 


xm 
mn 
| 
©9009090909090900006000 00090009 09 09 09 09 09 09 C9 C9 0908 SIN NIN NZ 
ze 


ARRAY OF FINAL EXCEPTION VECTORS = ONE PER MODE 


THESE VECTORS ARE usee i LOCATE AN EXCEPTION HANDLER WHEN ALL 
OTHER METHODS FAIL, PERMITS DEBUGGERS TO RECEIVE CONTROL EVEN 


THE STACK IS CLOBBERED, 
TL AL_F INALEXC ; FINAL EXCEPTION HANDLER ARRAY 
-LONG EXESEXCPTN + KERNEL MODE 
“LONG EXESEXCPTNE : EXECUTIVE MODE 
“LONG : SUPERVISOR MODE 
‘ “LONG : USER MODE 
: POINTER TO BASE OF CHANNELS 
: CTL L_CCBBASE : BASE OF 1/0 CHANNELS 
00000000 ;t0 - caael : FILLED IN IN PROCSTRT 
0010000 CTONG Gath 0e + SIZE. 
"LONG DBGAREA : ADDRESS 


: POINTER TO RMS IMAGE 
CTL GL_RMSBASE 
LONG 


PP oe ot oe ot we ot we ot oe 


BEDI 2 A MOCO WOW OOF FFF FOO OM WOOWOOLSONMOMMOMMOMMOEM “oO 


00000000 ; POINT TO RMS IN SYSTEM SPACE 
; PROCESS PERMANENT MESSAGE SECTION POINTER AND DEFAULT DISPLAY FLAGS 
7 CTL L_PPMSG ; ADDRESS OF PROCESS PERM. MSG SECTION 
00000000 00000000 - QUAD ; ; STARTING/ENDING ADDRESS OF SECTION 
CTL | smatetea ; DEFAULT MESSAGE DISPLAY FLAGS 
OF BYTE 1 ; DEFAULT: FAC,SEV, IDENT AND TEXT (ALL) 


| 
: 
| 
: 
: 


RPMNPINDS 9 9  * DOO QOOOOOS OOOO OO OOO OWWOWOWWOOWON NNN NINO OO 
PANO ODA UNE WIN O OD NAN E WIN SO OD NAME WW 9 OD NAME WW OUOONOULS WOOO uU-4 


OLS ae ee eee oe eee eww ss ono 


CTL GB_DEFLANG ; DEFAULT MESSAGE recon 
00 -BYTE 0 ; (CURRENTLY UNUSED) 
CTL GU_PPRSGCHN ; CHANNEL TO PROCESS PERM. MESSAGE 
0000 : -WORD ¢ ; SECTION (MAPPED IN CTLSGL _PPMSG) 
5 CTL GL_USRUNDWN ; PER-PROCESS VECTOR TO USER RUNDOWN 
00000000 -LONG 0 : SERVICE 
i CTL is ; ADDRESS OF oeratee CONTROL BLOCK 
00000000 ¢ - LONG : INIT BY PROCSTRT 
C CTL anal ; POINTER TO RECOVERY UNIT BLOCKS 
00000000 «LONG 
6 CTL  eataheabatha ; SITS-SPECIFIC PER-PROCESS CELL 
00000000 6 - LONG 
e4 CTL anette ; PROCESS KNOWN FILE LIST POINTER 
00000000 ee - LONG 
4} CTL AL_IPASTVEC ; VECTOR OF IPAST ADDRESSES 


H 9 
voe-boo SOSTESE RE TABess NECSEECHSRE BULU:TE HAMUDECHBGEELIRERMD Poe 8, 
0000000 90000000 90000000 Sonv0000 BreR Oe Lit 0.6.0.8,0,0.8.8 
7FFETE00" Thue | SHcS RC Chewrx ; ADDRESS OF AME CONTEXT PAGE 
7FFE2E00' : Ors fEeSLCTAFL INK ; ADDRESS OF IAF LIST (FOR DEBUGGER) 
00000000 i “TONG "pobre : oer coe, OF Bai Bae QUEUE AND 
00000000 00000000 734 ‘lone | So tO {ALLOCATION REGION, ON 'O PROCESS 
00000000 BF8t Te SON : ABN LSROLESoM muaeREobes SAT! 
00000000 O70 Ths apatite ; POINTER TO RIGHTS DATABASE IDENTIFIER (RDI 
cooocann BYat a : SERUENFESNUMHERASORrFSRge OF tosten 
00000000 00000000 7A CTL. GO, HELPFLAGS ; HELP FLAGS. ONE LONGWORD FOR USE 
90000000 o0000000 se G0_TERACHAR : HOME FOR TERMINAL CHARACTERISTICS 


78 cT GL_KRPFL ; P1 POOL LOOKASIDE LIST FORWARD LINK 
7FFEFFB8 078 . LONG CTCS$GL_KRPFL 
CTL ; P1 POOL LOOKASIDE LIST BACKWARD LINK 
7FFEFFBS - LONG CTC$GL_KRPFL 
CTL GL_CREPRC_FLAGS ; SCREPRC FLAGS 
00000000 LONG 0 ; 


COUNT OF TERMINATION HANDLERS FOR 
EXEC MODE 

SUPERVISOR MODE, AND 

USER MODE 


CTL L_THCOUNT 
90000000 G 
9000000 
00000000 ; 


MARBAAARAAAAAASAAARLASAASLALARAARALAARAAEALE RES E RARER RRR RASA RAR ARR R ARR AAAS A DS DO OD | 


END OF VECTOR PAGE 


SHARKS AAAAAA AAA AAA AAAEAAAAAAAAAARAAAAARAAAAAAAAAARATAAAAAAAAAARAAAAAAAATAAAEAE Tee 


CTLVECEND=. 
IF GREATER <CTLVECEND-CTLVECPAG>=512 


000007D 
FFFFFFD 


SNA AAA AAA AAA MMA BB BE BE ENNIO 


WRI OOOO NAUE WN SO OD NIA UE WIN O OD NAME WWI OOO NOAUEWI-2-#OOONO 


we VECTOR PAGE NOW LARGER THAN A PAGE *** 


? ~IFF ; ASSEMBLE REST ONLY FOR SHELL MODULE: 


SOOSSSCOOOSOOOSOOSOSSOOSOOSOOOOOOOOOCO 
ee ee 
SIV 9999999029000 °8D @ 
SSSSSSSSSSSSOSN DHL £FOOON A R2MBBOCOB@E 
~“ 
~ 
. . ao ae. 
~e 
oo 
zzz 
a 


; 


7FFEO200 7FFEO200 


00000010 
00000822 


FA0O 


00000825 


00000826 


00000827 


00000828 


00000829 


0000082A 


00000828 


0000082C 


0000082D 


0000082F 


WDOOOOO0OOOO000000000 000000000000 00000 00M coCUCD OD COCO CDCDCDOCDOCDODCUCDCSCDODOCDCD WZ 


ITION 16-SEP-1 :3 AX/VMS Macro v04-0 Page 19 
EGMENT Breer IRS BbiLdi2e PANCMES Macro Voted 7) 
fF -SBTTL PROCESS 1/0 SEGMENT 

; ; PROCESS 1/0 SEGMENT INITIAL CONTENT 

oo ecceccecseccncnnecncnncnnannencencons eccecnecencncnnenncenencenes 
5 «ALIGN PAGE 3 PAGE BOUNDARY 

8 PIO: ; BASE OF PROCESS 1/0 SEGMENT 

0 P1O GL.FMLH ; FREE MEMORY LIST HEAD 
91 «LONG PIOSGL_FMLH,PIOSGL_FMLH ; (Empty List) 
38 PIO GL {ior SPL ; FREE LIST HEADER FOR IMAGE I/O SEG 
94 -LONG PIOS$GL I TOF SPLH : 
32 -LONG PIOSGL-IIOFSPLH 3 
39 PIO cw. STATUS ; RMS OVERALL STATUS 
98 WORD ; 
3 
01 PIO$S_EODSTR==16 ; SIZE OF STRING + COUNT BYTE 
o¢ PIO T typ ; END OF DATA STRING 

0° -BLKB PIO$S_EODSTR 3 (COUNTED STRING) 
09 PIO GW _DFPROT : DEFAULT FILE PROTECTION 
6 -WORD “XFAOO ; SYS:RWED, OWN:RWED, GROUP: RE, WORLD:N 
08 P10 GB_DFMBC > DEFAULT MULTI-BLOCK COUNT 
-BLKB 1 

11 PIO GB_DF MBF SDK ; DEFAULT MULTI-BUFFER COUNT SEQ. DISK 
19 -BLKB 1 
14 PIO GB_DFMBF SMT ; DEFAULT MULTI-BUFFER COUNT MAGTAPE 
13 -BLKB 1 

i P10 GB_DF MBF SUR : DEFAULT MULTI-BUFFER COUNT UNIT REC. 
0 PIO GB_DFMBFREL ; DEFAULT MULTI-BUFFER COUNT RELATIVE 
1 -BLKB 1 

: PIO GB_OF MBF IDX 3 DEFAULT MULTI-BUFFER COUNT INDEXED 

§ PIO GB_DFMBFHSH ; DEFAULT MULTI-BUFFER COUNT HASHED 

: PIO Fe _ornac ; Network block count transfer size 

9 -BLKB 

§ PIO $8 _RASPROLOG ; Structure level for RMS files 

z -BLKB 

5 PIO GU_RASEXTEND ; Extend quantity for RMS files 

6 -BLKW 


SHEL PROCESS DEFINITION 16-SEP-1984 Qi:11:32 YAX/VMS Macro v04-0 Page 20 SH 
voe+000 PROCESS 190. SEGHENT ~SEprhS8e Basti cg HNSMeR ee ee ek R 08 ve 7) vO 
F 7 
F § «ALIGN LONG 
4 PIO STOSGL DIREACH ; DIRECTORY CACHE LIST HEAD 
aaa sity 4 LONG PIOSGL_DIRCACHE 3; EMPTY LIST 
7FFE 2 LONG pioset~ _DIRCACHE 
44 PIO pe etemameshoact ; FREE LIST FOR DIRECTORY CACHE NODES 
00000000 : 02 - LONG ; (NOTE: SINGLY LINKED) 
C 309 PIO GL_RULOCK ; List of locks held for Recovery Units 
00000000 Z ac8 «LONG 0 3 (Note: Singly Linked): 
4 950 PIO GL WXTIROSES ; Next sequence number for IRBSL_IDENT 
00000000 4 32) . LONG 
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a a nt a tt a 4 A 5 ss th es 


POPPORIMOPONONIPOND 2 


FILSGT_DDSTRING==PIO$GT_DDSTRING 


; THE DEFAULT DIRECTORY STRING IN THE PROCESS QUOTA BLOCK MOVED FROM A 
; CREATOR PROCESS TO A NEWLY CREATED PROCESS MUST BE AT LEAST AS LARGE 


; FILE READ DEFAULT DIRECTORY STRING 


ON 16-SEP=1 :11:3 AX/VMS Macro V04-0: Pa 2 
ENT g-8E EP=19 38 8}: i}: i YeyS eR SR cj SHELL. MAR; ” ‘4, 
; IMAGE 1/0 SEGMENT CONTEXT AREA 
: .ALIGN QUAD 
P10 W_IIOIMPA IMAGE 1/0 IMPURE AREA 
WORD FLAGS WITH I10 SEGMENT SET 
“WORD PRTS$C_UREW PROTECTION $TO SET ON PAGES 
.LONG 0 ; MUST BE INITIALIZED BY THE IMAGE 
+ ACTIVATOR TO THE ADDRESS OF THE FIRST 
+ PAGE IN THE IMAGE 1/0 SEGMENT. 
: (NOTE: THIS LONGWORD IS REFERENCED BY: 
: PIO$SGW_II1OIMPA+IMP$L_IOSEGADDR) 
LONG 0 3 LENGTH'OF IMAGE 1/0 SEGMENT IN 
: MUST BE INITIALIZED BY THE IMAGE TACTIVATOR 
+ (NOTE: THIS LONGWORD IS REFERENC 
+ PIO$SGW_I1OMPA+IMP$L_IOSEGLEN) 
PIOL B1 5 
.LONG PIOLB1,PI0LB1 : FREEPAGE LIST HEAD 
PIOL B2 3 
-BLKL 1 + SP SAVE LONGWORD 
.LONG PIOLB10 : IFAB TABLE ADDRESS 
“LONG PIOLB20 : IRAB TABLE ADDRESS 
[LONG IMPS$C_ENTPERSEG : # OF SLOTS PER TABLE 
PIOL B10 : 
LONG + LINK TO NEXT TABLE SEGMENT 
“BLKL IMPSC_ENTPERSEG : IFAB TABLE SLOTS 
PIOL 820 F 
.LONG 0 : LINK TO NEXT TABLE SEGMENT 
“BLKL = IMPSC_ENTPERSEG : IRAB TABLE SLOTS 
PIO AL_RMSEXH : EXIT HANDLER CONTROL BLOCK 
“LONG + ARGUMENT COUN 
“LONG PIOSAL_RMSEXH+8 : STORE EXIT LODE OVER ARGUMENT COUNT 
P10 ga LIODEF AULT : DEFAULT IMAGE 1/0 AREA 
.LONG 0,0 
.ALIGN LONG 
; DEFAULT DIRECTORY INFORMATION 
‘ P10 GT_DDSTRING : DEFAULT DIRECTORY STRING 


SHEL PROCESS DEFINITION 16-SEP-1984 01:11:3 AX/VMS Macro V04-0 Page 23 
vO6=000 PROCESS 1/0 SEGMENT = Eb=1 984 eat USYSVSRCTSHELL MAR; : (1) 
2 : ] ; AS THE LARGEST DIRECTORY STRING ALLOWED BY RMS. 
3 é ! ASSUME PQBSS_DDSTRING GE FWASC_MAXDIRLEN 
990909 92C 1034 TEMPS...=. 
5D 45 58 45 53 59 B QQ" 2 € 1035 eASCIC \CSYSEXEI\ ; DEFAULT DIRECTORY STRING 
; ‘ j ekeekeerererererererereeeeeeee NOTE WELL teeeeereeneereeeeeereeeereeeet 
9 1 : ; THE DEFAULT DIRECTORY STRING MUST BE THE LAST ELEMENT TO APPEAR IN THE 
9 1 rk ; RMS CONTEXT AREA. IN FACT, IT HANGS OFF THE END OF THE PAGE. IF STORAGE 
9 1041 ; WERE ALLOCATED, THE SHELL WOULD GROW IN SIZE BY ONE PAGE, AN UNNECESSARY 
89 1 4g ; WASTE OF SPACE. THE .BLKB DIRECTIVE HERE IS SYMBOLIC, TO EXPRESS THE SIZE 
832 He ; OF THE DIRECTORY STRING IF SPACE WERE REALLY ALLOCATED. 
0938 ok ; -BLKB PQBS$S_DDSTRING-<.-TEMPS$...> ; FILL TO MAXIMUM POSSIBLE SIZE 
bose 1308 : keekerteeerererererereeeeeeee END OF NOTE eeeeeeeeeeeeeeeerereneeeeeene 
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WITH SYSGEN PARAMETERS 


haetenn iis » “SHELL 


10$: 


se 
oO 
ad 


OUTPUT PARAMETERS: 


"SrSEp=1986 OS:A7i2e USYSUSRcSBhECL canst 


Serene’ kh he ete, THE INSWAP OF A SHELL 


TERS AND CONFIGURE THE PROCESS 
“DRESS SP 


ACE. 
S THAT ARE i. sECOME THE KERNEL 


Fare PTESA MODIFY 


PHD AND CONTROL REGION FOR THE NEW PROCESS 


-ALIGN PAGE 


PCBSL_PHD(R4) RS 
MOVL OP eUpsG ~SHELLSIZ, RO 
MOVAL  (R9)CROJ, 
ASHL 2, "aaSWPECL SHELIO,RO 


sual R RI 

ROTL : 

ROTL Hs SPSUPSGL_SHELIO,RO 
CLRQ = (RO) + 

CLRQ = (RO) + 

SOBGTR R1,10$ 

OVL RS.R 

JSB a#MMGSSVAPTECHK 
MOVL  (R9)+, (R3)+ 
MOVZWL af swPScu_WSLPTE.R1 
ah 


R1 
MOVL =(R11), »(R3)+ 

or suPscu en EMPTPTE,RO 
aSuPscy, GACPTE. RO 


MO. 
SOBGTR RO,40 
INVALID 


ALL OF THE HEADER PAGES LESS PAGE 


MOVZWL Sere oe IBALSETX (Re 
ive R8.P “PHVINDEX(R5) 


¢ 


Tat te “DFPFC,PHDSB_ DEPECTRS) 


; ~SBTTL INITIALZE SHELL WITH SYSGEN PARAMETERS 
; oni “+ DESCRIPTION: 
: SHELINIT IS CALLED BY THE S 
: PROCESS TO APPLY THE SYSGEN PAR 
; FOR THE PROPER WORKING SET SI 
: THIS CODE IS CONTAINED IN PAG 
; STACK FOR THE NEW PROCESS. 
; CALLING SEQUENCE: 
: JSB O#SWPSSHELINIT 
: INPUT Seay RS: 
; R4 = PCB ADDRESS 
: R9 = SWAPPER MAP POINTER 
: R10 = PTCSM_VALID!PTESC 
: R11 = SWAPPER END MAP POINTER 


START OUT ON PAGE BOUNDARY 


SS HEADER wr ae 


LLOCATED FOR SHELL 
_ HH Ss IN. MAP 


Ss 
AL 
D 
ZE OF SHELL 

Ze OF EXTENSION PAGES 

DOUBLE QUAD COUNT 

B+ ie AT END OF 1/0 TRANSFER 


READ FROM SHELL 
VA_OF PHD 
GET SVA OF FIRST PHD PTE 
MAP PROCESS HEADER FIXED PAGE 
e' af ton " ADDED PAGES FOR WSL+PST 
LESS FIXED HEADER PAGE 

A_ WSL PAGE 

HEM ALL 
GET COUNT OF EMPTY PAGES 
st at MAP POINTER 
GET COUNT OF. BAK/WSL/VAL/LCK PTE 
MAP BAK/WSL/VAL/LCK PAGES 
INVALIDATE TRANSLATION BUFFER 


TABLES HAVE NOW BEEN MAPPED 


; GET BALANCE SLOT INDEX 
SET INTO PROCESS 


HEADER 
; SET DEFAULT PAGE FAULT CLUSTER 


Page 24 
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(1) 


ei ition Hts 9}: \}:3 tle 


wish mnt 


Ld 

mo 
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ww 


0 Ma 
I TH SYSGEN PARAMETERS =SEP-19 4 03:47:4 SYS.S acy SHELL. MAR; 
0 4 RO 3; COUNT MAXIMUM FREE SPACE TILL NOW 
53 0000 yoo" F 2 mov SUL agnncscu. MINPFIDX,R3 3; START SCAN AT FIRST PAGE FILE 
. D MO ; SET DEFAULT PAGING FILE TO CHOOSE 
56 Q0000000'9F 0D MOVL aeMGSGL -PAGSWPVC ,R6 ; GET ADDRESS OF PAGE FILES VECTOR 


CHECK FOR SPECIFICATION OF A PAGE FILE 
THIS IS TAKEN AS ADVICE ONLY, NORMAL ALGORITHM USED IF SELECTION IMPOSSIBLE 


52. SA AG MOVZWL PCBSB_PGFLINDEX(R4) ,R2 : GET THE REQUESTED PAGE FILE INDEX 
1 BEQL 44 : NONE S CIFIED 
wed piety faa" A UES RE - ew 
00000000 ' 9F 32 CMPL = R2, @#MMGSGL_MAXPF IDX 
1 BGTRU 4 a$ ; HIGH - GIVE U 
58 664 AA MOVL {R21 cer BLOCK ADDR RESS 
05 2 as AAT BBC nae V_ ane, PFLS$B_ FLAGS(RB), tb ; BRANCH IF NOT USABLE 
AAF BRB 4 4" ; WE HAVE A GOOD SELECTION 
52 6643 AB 44$:  MOVL (R6) R31. R2 GET ADDRESS OF NEXT P AGE FILE BLOCK 
5B AG OO AB BISB = #PF LSK INITED,PCBSW_PGFLEHAR(R4): ADD INITED TO THE REQUESTED FLAGS 
58 23 Ae 58 AG AB BISB3 pceasy PGFLCHAR(R4) ,PFLSB_ FLAGS (RD), R8 ; OR THE FLAGS TOGETHER 
23 A2 58 AB CMPB rset FLAGS (R2) ; DID THEY C HANGE 
0D BNEQ 46 : Y NO MATCH = TRY AGAIN 
50 118A CMPL  PFLSL_FREPAGCNT(R2),RO ; CHOOSE PAGING FILE WITH MOST FREE PAGES 
0 BLEQ : BRANCH IF WE HAVE BETTER CANDIDATE 
50. (18 Ag ROVL PFLSL_FREPAGCNT(R2),RO ; SAVE NEW FREE P AGE COUNT 


51 MOVL NDEX 
D7 53 00000000' 9F 46$: AOBLEQ as#MMGSGL _MAXPFIDX,R3,44$; LOOP THROUGH ALL PAGE FILES 
1F A } 47$: MOVB ING 
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5 $B8°P (RS SE FIL 
35 NS 420009000" 9F MOVE  a#$GNSGB"PGTBPFC .PHDSB_PGTAPFC(RS): SET SYSTEM DEFAULT PT CLUSTER 
BF MOVW #SWPSC_KSTACK_WSL,PHDS@_WSLIST(R5): INIT POINTER TO LIST 
g,gon0g00n'g F A OVL @#SGNSGL_PHDPAGCT R7? ~; GET TOTAL COUNT OF HEADER bACESS 
0009000 A MOVZWL afSuP $GW7W Rb GET COUNT OF WSL HEADER PAGES 
A ASHL #9 PHOSL PSTBASOFF (RSS SET END AS BASE FOR PST 
se. *00009000" oF A ADDW srsupscu, EMPTPTE ,R6 : ASSUMES NO OVERFLOW POSSIBLE 
56 ASHL  #7,R6,R6~ CONVERT TO LONGWORD COUNT 
4B A H : MOVL  R6,PHOS$L_WSLX(RS) SET BASE OFFSET TO WSLX AREA 
57 90000000" oF ADDL ar SGUSGL ” PIDAGCNT. R7 ADD PAGE TABLES TO COUNT 
50 01 ADDL #1 ROUND TO LONGWORD SIZE 


50 


OSOVOOOOINFS NWIOWDOO" To 9 — 0OMwo-omMo 90-90 Ww 
OOOH —"GODOWDN OOOO" ODO" 0 "OF - TWO 


nae red eS IN WHOLE LONGWORDS 
SET BASE OF BACKING STOR 


»R6 
MOVL Bt »PHDSL_BAK(R5) E VECTOR 
ALLOCATE SPACe FOR 1 ait STORE VECTOR 


QeNO 
e@e Se Ge te te Ge te Ge Be @ 


Ouro 


ete 


C4 MULL Acre : CONVERT TO BYTE OFFSET NS 
64 00 MOVL Re. PHDSL -PTWSLELCK(R5) BASE 1° - LOCKED COUNT VECTOR NS 
57 00000000' p MOVL NGL PT Ge PAGE TABLES Pi 
: AS 66 E MOVAB 436 R “PUDSe. Prastey nin’ ) = "ALLOCATE AND SET BASE OF VAL CNT 
B5 9E MOVAB a@PHDS$L_PTWSLEVAL(R ; SET BASE FOR VALID COUNT VEC 
E MNEGL #1, : MINUS ONE FOR BACKGROUN 
B5 MOVAB @PHD$L_PTWSLELCK(RS)CRS),R1 AND BASE FOR LOCKED COUNT 


50$: MOVB R “{ROTs INIT oir COUNT VECTORS TO MINUS ONE 


R2,(R1)+ 4 
50$ : FOR ALL PAGE TABLE SLOTS 
#KSTACKS1, - - (RI) COUNT OF L LO Hor akces SHELL 
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MO $ 
MOVZBL @#SWPSGB"SHLPIPT, re ; NUMBER OF PERM PAGE TABLES 


C 10 


SHEL PROCESS DEFINITION 16-SEP-1984 01:11:3 AX/VMS Macro Vv04-0 P SH 
vou-000 INITIALZE SHELL WITH SYSGEN PARAMETERS  Sasepatond Ooiapicg VeneVEs Macro, VOked age 40, Sy 
6C A BO 0B65 1163 MOVW RO,PHDSW_PTCNTLCK(R5) ; COUNT OF PT CONTAINING LOCKED PAGES Pl 
§ A BO 0B : 1164 MOVW OR “PHDS-PTENTVAL (RS) ; COUNT OF PT CONTAINING VALID PAGES PI 
A BO OB6D 1165 MOVW RO,PHDSWIPTCNTACT(RS) ; COUNT OF ACTIVE PAGE TABLES PI 
72 A BO 0871 11 § MOVW = RO,PHDSWLPTCNTMAX(R5)  ; COUNT OF PT WITH NON-ZERO ENTRIES Pl 
56 g B75 11 ADDL RO,R 3 MAKE ROOM IN WSLIST FOR HOR+PGTBLS Pl 
57 OE A C 7 1168 MOVZWL PHOSW_WSDYN(RS) ,R7 ; GET INDEX TO CURRENT DYNAMIC ENTRIES Pl 
DD OB7C 118 PUSHL R7 3 SAVE POINTER FOR LATER USE Pi 
oc A 6 A 7E 11 0 ADDW R6,PHDSW_WSLOCK(RS) ; CORRECT LOCK WSL INDEX PI 
3 A 6 AO 0B 117 ADDW R6,PHD$SWIWSDYN(RS) ; AND DYNAMIC INDEX PI 
10 A 6 OA 1126 ADDW. R6,PHDSWIWSNEXT(R5) ; AND NEXT POINTER Pl 
36 bf Sk eae tee ADUSaL BSURSETNDYN.R SET COUNT OF DYNAMITE PAGES PI 
6541 654? DO OB f 1175 608: MOVL (ASSERT CSO ERT : MOVE A DYNAMIC WORKING SET PAGE PI 
1 06 9 1176 INCL R1 ; NEXT DESTINATION PI 
2 B98 117 INCL R7 : NEXT WSL ENTRY Pl 
F450 «36FS «(OB9A «1178 SOBGTR RO,60$ ; MOVE ALL DYNAMIC PAGES Pi 
58 80000029 8F 00 0890 1179 OVL aus SH VAL ID- ; WSL ENTRIES FOR HEADER ARE VALID Ht 
OBA4 1181 'WSL$C-PPGTBL- + PROCESS PAGE TABLE, Pi 
OBA4 11 ¢ 'VASM_SYSTEM>,R8 ; AND SYSTEM SPACE PI 
52. 55 00 OBA 11 MOVL R5,R ; SET PHD ADDRESS TO GET SVAPTE PI 
00000000'9F 16 A7 1184 JSB a#*MMGSSVAPTECHK ; SVAPTE PI 
50 58 b0 AD 1185 MOVL RB,R ; MAKE WORKING COPY PI 
51 0000000 9 C 0880 1186 MOVZWL a@#SWPSGW_WSLPTE,R1 + COUNT OF WSLPTE PI 
5 8 0 OBB7 1187 MOVL (SP)+,R2 3; RESTORE WORKING SET INDEX TO LOCKED Pl 
014 0 OBBA 1188 BSBW FILLPHD : SET UP FOR VALID PHD PAGES PI 
51 00090000 9F C OBBD 1189 MOVZWL OF SUPSGu_EMPTPTE RI ; GET COUNT OF EMPTY PTE AGAIN PI 
5 6341 DE C4 1190 MOVAL (R3)CR1)7R3 ; ADVANCE SPT ADDRESS PI 
7) hUM 99 7 C8 +1191 ASHL #9,R1,R1 ; CONVERT TO BYTE COUNT PI 
50 1 0 cc 119¢ ADDL ; AND UPDATE CURRENT VA PI 
51 00000000'9F C CF 119 MOVZWL aa#SWPSGW_BAKPTE,R1 : GET COUNT OF REMAINING HEADER PAGES PI 
12 0 D6 1194 BSBW FILLPHD ; SET UP FOR VALID PHD PAGES PI 
51 90000000 "3F dO D9 1195 MOVL @#SGN$GL_PTPAGCNT,R1 ; GET COUNT OF PAG LES PI 
FC A341 0000000 ef 09 E 1196 65$: MOVL #PTESC_ERKW,-4(R35CR1] ; SET A DEMAND ZERO PAGE FOR PAGE TABLES PI 
F451 OF E9 119 SOBGTR R1,65$ : INIT ENTIRE PAGE TABLE AREA Pl 
51 00000000" 9F 2A EC 1198 MOV ZBL a#SvPSGB_SHLP1PT RI : GET COUNT OF Pl PAGE TABLES 4 
24 55 F6 1200 DECL R ; LESS ONE MORE FOR DEBUGGER PAGE PQ 
56 00090000 °9F co FB 1 4 ADDL OASGNSGL _PIPAGCNT .R6 : PAGE OFFSET TO PAGE TABLE PQ 
5 6346 b FF 1 ¢ MOVAL (R3)CR6),R3 ; COMPUTE SVAPTE PQ 
56 36 9 ; 120 ASHL »R6,R6 ; CONVERT TO BYTE OFFSET Pa 
0 . ¢ 1 04 ADDL R6,R : ADD TO CURRENT BASE WSL PQ 
A A 1205 PUSHR #*M<R1,R3> ; SAVE KEY REGS PQ 
51 2 c ¢ 1 $ SUBL “#SWP$C_SHLP1PT,R1 ; LESS STANDARD P1 PAGE TABLES PQ 
6 F 1 BLEQ 0 ; BR IF NO EXTENSIONS PG 
83 7B 09 11 1208 708: MOVL =(R11),(R3)+ : STORE A PTE FOR EXTENSION PR 
FA 51 OF 14 1209 SOBGTR R1 ; DO ALL EXTENSION PAGE TABLES PR 
51 D 17 1210 B08: OVL S$*#SWPSC_SHLP1PT,R1 : SET COUNT OF STANDARD PS 
83 D 1A 1211 908: OVL (R9)+, (R3)+ : STORE PTE FOR STANDARD 
FA 51 FF 1D 1 13 SOBGTR : DO ALL STANDARD P1PT 
OA 121 POPR #*M<R1,R3> ; RESTORE KEY REGISTERS 
OODF 0 1214 BSBW PILLEH ; SET UP FOR VALID PHD PAGES 
50 00000000'9F 9 ¢ 1215 ROTL # » BE SGNSGL PHDPAGCT,RO ; OFFSET FOR POBR 
oC 3 5 p 1 16 ADDL RO. PHOSL POBR(RS) ; FORM POBR BASE VALUE 
51 0000000 "7 50 cf A ROTL r + @#SGNSGL_PTPAGCNT .R1 : OFFSET TO PIBR 
0000 ¢5 r € D 1 8 ADDL R1,PHDS$SL_P1BR(R5) ; FORM PIBR BASE VALUE 


D 10 
SHEL PROCESS DEFINITION 16-SEP-1984 01:11:32 VAX/VMS Macro V04-0 Page 27 
vOu=600 INITIALZE SHELL WITH SYSGEN PARAMETERS g- Ser 7 8}: 4}; if ty YS. SRCJSHELL.MAR; - th 
30 AS 0 C2 Oc42 1 SUBL RO. PHDSL_FREPIVA(RS) ; COMPUTE CORRECT FREPIVA 
51 g (46 1 SUBL _——RO.R1 : EXTRACT PT SIZE TOTA 
50 50 F7 BF (49 1 ASHL  #-9,R0,RO : BACK TO PAGE FOUNT 
00p4 cS. 50 ¢ C4E 1 SUBL RO, PHD$L_PILR(RS) : NOW CORRECT P17 LENGTH REGISTER 
51 1 FE BF C53 1204 ASHL  #=2,R1,RT + COUNT OF AVAILABLE PTES 
51 50 ce 0C58 1225 SUBL oR + DIMINISH BY PHD WINDOW SIZE 
eis HCE C : $ ADDL  R1,PHDSL_FREPTECNT(RS) : AND FORM COUNT OF FREE PTES 
CSF 1 8 ; THE FOLLOWING SHUFFLE OF THE WORKING SET LIST REARRANGES ALL WORKING SET 
CSF ; LIST ENTRIES THAT ARE NOT KERNEL STACK PAGES. THE SWAPPER MAP IS BEING 
c r 0 ; REORDERED TO MOREE UiTn THE WORKING SET LIST DEFINED IN THE SHELL. 
CSF : .REPEAT SHUFFLE COUNT ; COUNT FROM WSL TEMPLATE 
CSF 1 MOVL (R11) 4 + REARRANGE SWAP PAGE LIST 
8B 89 v0 CoE , .ENDR 
8B «D4 0C65 1 : CLRL ; SET STOPPER IN MAP 
30 AS 90000200 gf C1 0¢67 ADDL3 #312 PUOSL FREPIVACRS), - ro pbihten Pree’ OF WINDOW 
St 1 § <CTLSGL bAD- -CTLSGL vECTORseo THROUGH SWAPPER MAP 
00 24 a6 12~«€2 Me 40 ns BBSS  #PCB$V_PHDRES,PCBSC_STS(R4),100$; MARK PHD RESIDENT 
50 (08 AS 3¢ oc79 4g ; MOVZWL PHDSW_WSLIST(RS5) ,RO : GET INDEX TO WS BASE 
51 00000000'°9F 50 Al OC7F 1244 ADDW3 RO. B#SGNSGL MAXUS NT, R1* : CALC MAX AUTHORIZED 
OA AS 1 BO OC87 1245 MOVW 1,PHD$W_WSAUT 3; SET MAX AUTHORIZED 
18 a5) 0 51—s«&BO cae 1 46 MOVW RY {PHDSW-USQUOTACRS) : AND QUOTA 
16 a5 51 BO OCBF 124 MOVW R1,PHDSW~ (R5) : AND EXTENT 
1405 51 BO O0C93 1248 MOVW = R1,PHD$W7WSAUTHEXT(R5) + AND AUTHORIZED EXTENT 
74 AS 00000000'°9F B80 OC97 1249 MOVW @#SGNSGWMINWSCNT ,PHDSW_WSFLUID(RS) : SET FLUID REQUIREMENT 
51 00000000'9F B80 OCOF 1 30 MOVW § a#SGNSGWDFWSCNT,R1 ; GET DEFUALT WS SIZ 
50 51 ty CA6 1251 ADDW = R11, RO ; CALC LAST 
12 AS 20 BO OCA9 1 3 MOVW RO, PHD$W_WSLAST(RS) ; SET LAST 
1A A5 50 BO OCAD 125 MOVW RO, PHDSU_DEWSCNT (R5) ; AND bEPAULT COUNT 
goth £3 3 GB Bias 1838 REWYRL-PIPRI“BSSATAST”” —s suas wo ease ndcfstens 
0000 ¢5 «= 555—s«CO acer 36 ADDL 5, PHDSL-P1BR(R5S) + AND P1 BASE REGISTER ALSO 
CBF 38 : REMAP SYSTEM SERVICE VECTORS FOR THIS PROCESS 
: #PISYSVECTORS,R2 : PUT THEM HERE 
= Hopp DON oF 0° Oca i a itt SPMAGESVAPTE CHIR ; GET ADDRESS OF PTE FOR VECTORS 
50 00000000'9F 0 cce 1 6¢ MOVL § @#MMG$GL_SPTBASE,RO + SYSTEM PAGE TABLE 
31 5 9A OCD3 1 6 MOVZBL #SONSC _SYSVECPGS RI : NUMBER OF PAGES 
83 80 0020 009 rf C9 OCD6 1264 110$: BISL PTESM- WINDOW, (RO)+, (R3)+ 
F551 —s«F 5 COE ss SOBGTR Ri i108 
1 1267 : THE PAGE TABLE ARRAY FOR LOCKED WSLE'S MUST BE INCREMENTED ONE 
Fy 1 68 ; REA CH WI NDOw PTE. THIS BALANCES THE LOGIC IN $CREPAG/$DELPAG 
Cel 1 $ ; FAA PLACES THE PAGE TABLE PAGE IN THE LOCKED PORTION OF THE 
cel 20 ; DORKING SET FOR USER PFNMAPPED PAGES. 
Cel 1 es : THIS LOGIC ASSUMES THAT THE VECTOR PAGES ALL LIVE IN THE SAME 
cel 3 ; PAGE TABLE PAGE. 
Tet, Be SUBL3 PHDSL_POBR(RS).R3,RO  ;BYTE OFFSET OF PTE 
net, nore SP +} te} 1276 ASHL i oro ‘BYTE INDEX OF CONTAINING PAGE TABLE 
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INITIALZE S$ WITH SYSGEN PARAMETERS 8735p] i 83 4}: if Sys. SR RCISMELL MAR: Mf an 
50 64 A C ADDL PHDSL_PTWSLELCK(R5) ,RO + COMPUTE THE ADDRESS OF THE LOCKED 
3 f ADD R5,R ; WORKING SET LIST PAGE TABLE BYTE 
6 ADDB #SGNSC_SYSVECPGS, (RO) ARRAY AND INCR BY NUMBER OF VEC PAGES 


FINISH UP INITIALIZATION, SET DATA NEEDED BY SWAPPER 


MNEGL PCBSL_WSSWP(R4) ,PCBSL sare Str HELL 
CVTLW PCBSL_SWAPSIZE(R4) ,PHDSW_ * SUAPSIZE CRS) 


; CLEAR THE PCB FIELDS THAT WERE USED TO CARRY PAGE FI 
; INFORMATION TO THE we PROCESS. THESE FIELDS WILL BE 
; FLAG CLUSTER POINTERS 


D TO SWAPPER 
TAL SuAP ALLOCATION 
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F INISHE 
SET INIT 
LE AND SWAP FILE 

COME THE COMMON EVENT 


RS 
-EFC3P EQ <PCBSL_EFC2P + 4> 
Port $ P 
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CLRQ PCBSL_EFCP(R4) ; START WITH NO COMMON EF CLUSTERS 
RSB ; RETURN 
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~SBTTL FILLPHD = SETUP A VALID PHD PTE 


20 - att ie SET AcE St ENTRY, coppates) AND FLAGS (UPDATED) 
AGES TO FILL ¢ ateee 
R2 - VORKING. ae LIST INDEX ¢ 
R35 = SVAPTE FOR PHD PAGE (UPDATED) 
ADDRESS 


ie» ae] 


; R4 = PCB 
; RS = PHD ADDRESS 
; R7 = SCRATCH 
; RB = SCRATCH 
: R10 = PFNSC_ERKW!PFNSM_MODIFY!PFNSM_VALID 
FILLPHD: ; SETUP VALID PHD PTES 
654 0 00 10g MOVL. RO,(RS)CR2) ; i; STORE WORKIN NG SET LIST ENTRY 
A BICL3 R16, (R3)+,R7 : OM SPT 
00900000 "9 DD PUSHL a@#PFNSAB_STATE RESS 8 BASE FOR PFN STATE 
9g F MOVB &#<PFNSC_ACTIVE!PFNSM _novir¥>, acsP) +E MARK K PAGE Active 
0000000'9F oD PUSHL QPF SAB. TYPE STACK ADDRESS BASE FOR TYPE 
MOVB #PFNSC PPGTBL .@(SP)+CR7J; Ser PAGE TYPE TO PAGE TABL E 
PUSHL  aaPF A ADDRESS BASE FOR PFN BAK 
MOVZBL PHSB PAGFIL(RS) ,W8 ort PAGE FILE NUMBER 
ROTL 0_PGFLX,R8,e(SP)+CR nh SET BACKING STORE ADDRESS 
PUSHL a#PFNSAL_PTE TACK ADDRESS OF PFN PTE BACK POINTER 


“G(RS) ,8tSP)4ER79 SET PTE BACK POINTER FOR PAGE 


The fot Loytng use of the PFN_REFERENCE macro must force absolute addressing 
because of the peculiar method in which this code executes. In addition, 
this code is not a part of ene Senpegen executive and cannot have its opcode 
automatically fixed up by IN 
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00000000'9F odd STACK BASE ADDRESS OF WSLX VECTOR 


PFN_REFERENC ~ 
MOVW = <R2> SSP) SCR }>,- ; SET WSLX FOR PAGE 
LONG OPCODE=MOVZWL,- 
IMAGE=SHELL,- 
ODE=ar : FORCE POSITION INDEPENDENCE 
INCL R t NEXT WORKING SET LIST ENTRY 
MOVAL 512(RO),RO : NEXT VA 
SOBGTR R1,10$ : FILL ALL REQUESTED PAGES 
RSB : AND RETURN 
ALIGN PAGE : PAGE ALIGN 
SWwPSC -swéttsiz= <.-SHELL>a@-9 : SIZE OF SHELL PROCESS IN PAGES 
IF GT $WP$C_SHELLSIZ- 


-8 
“ERROR SWPSC"SHELLSIZ; Shell size changed, update swapper and FREELIM 
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Process IFI/ISI Tables 
this module merely defines 


-PSECT SABS$,ABS 


-=PIOTBL 

P102 Ai0 $ 
~BLKL 3 
-BLKL IMPSC_NPIOFILES ; 
PI02 A20 H 
-BLKL : 
~BLKL IMPSC_NPIOFILES : 
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ols and offsets into 


SHE 


LL module. 
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7FFE3000 
7FFE3004 
TEEESO08 
7FFE3010 
7FFE3018 
7FFE30IC 


7FFE303C 
7FFE313C 
7FFE315C 
7FFE325C 


000015A4 


SoSEp=198e Os:ariae 


~SBTTL COMMAND LANGUAGE INTERPRETER DATA AREA 


GENERIC COMMAND LANGUAGE INTERPRETER DATA 


; SET BASE VALUE FOR REGION 
; CALL BACK VECTOR FOR CLI 


; ALLOW FOR EXPANSION 


; VA RANGE INTO WHICH 
; VA RANGE INTO WHICH 
; MAPPED. 


>m 
an" 
Gye 
c2 
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a- 
moe 


NTERPRETER DATA AREA 


2 
CTLSAL_CLICALBK:: 
BLKL 


“BLKL. 1 
CTLSAG_CLIMAGE 
CTLSAG_CLITABLE:: 

-BLKL 


CTLSGL_UAF_FLAGS:: 
-BCKL 1 


CTLSGT — 
CTLSGT oe te 
CTLSGT_SPAWNCLI: 


LKB 
CTLSGT _SPAWNTABL E: 
-BLK POBSS _SPAWN_TABLE 


? T7SPAUNCL I “ttt ser~ 
at “SPAWNTABLE=CTLS 


PQBSS_ CLI_NAME 
POBSS_ CLI_TABLE 
PaBss_ SPAWN_CLI 


ASZ==CLIDATAEND=CTLSAG_” CLIDATA 
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FLAGS FROM AUTHORIZATION RECORD 


CLI NAME (FILE NAME ONLY) 

a 3 AS COUNTED ASCII 

CLI TABLE NAME (FULL FILE SPEC) 
STORED AS COUNTED ASCII 

SPAWN CLI NAME (F ie NAME ONLY) 
STORED AS COUNTED A 

SPAWN CLI TABL 
STORED AS COUNTED ASCII 


EQ <PQB$T_CLI_TABLE 
EQ <PQB$T_SPA 


AX/VMS Macro V04- 
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LE NAME (FULL FILE SPEC) 


-PQBST_CLI_NAME> 
$T~CLI_NAME> 


PAQN_CLI 
EQ <PQB$T_SPAWN_TABLE-PQB$7_CLI_NAME> 


START OF DATA AREA 
; SIZE OF DATA AREA 
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SHEL PROCESS DEFINITION SEP-1 :3 AX/VMS Macro v04-0 Page 3 
you-000 COMPATIBILITY MODE EMULATOR CONTEXT PAGE 7 fp. 13h 83; i}: if toys. SRCJSHELL.MAR; . if, 
c 14 ££ -SBTTL COMPATIBILITY MODE EMULATOR CONTEXT PAGE 
c 16 $ : __COMPATIBILITY MODE EMULATOR CONTEXT PAGE 
7FFE1E00 1409 ° eCTLSAG. CMEDATA : POINT TO START OF 
E00 1410 CTLSAL_CMCNT : COMPATIBILITY MODE AREGISTER CONTEXT 
7FFEIE28 160 1611 MSURL 10 + SAVED BY EXCEPTION 


J 10 
PROCESS DEFINITION 1 ~$E0-1 986 4: }}: 32 YAXcvits Be cro v94=00 Page 33 SI 
v04- GLOBAL USER=MODE CONTEXT PAGE -SEP-1984 03:4 SYS.SRCJSHELL.MAR; 1 (1) vi 
Hi Vale »SBTTL GLOBAL USER-MODE CONTEXT PAGE 
IE 1416 : GLOBAL USER-MODE-ONLY CONTEXT PAGE 
1E 1418 ; This Best may ONLY be used by user-mode code, since the data 
1E 1419 ; pet. : solute Y no protection from errant eorere Dl programs. 
1E 1420 ; use this area for cells which = t be wiped que by 
1€ 1421 ; oe Nuseronode program at any time dur mage Quecyt on, 
i 1? § 3 except when it only prevents that proeree from running. 
7FFE2200 1 14 4 ; . =UWVECPAG ; POINT TO START OF AREA 
14 § CTLSGL_DCLPRSOWN: : 3; ADDRESS on 4h yt WRK pantie CREATED 
7FFE2204 14 -BLKL ; BY DCL Ge “bi ARSE 
4 1428 CTLSGL _CLINTOWN: : 3 ADDRESS” OF CONT TEXT BLOCK USED BY 
7FFE2208 Be 1? , -BLKL i 3; CLISINTERFACE PACKAGE IN DCL/MCR 
o8 \ } 3; THE REST OF THIS PAGE IS UNUSED 


K 1 


SHEL PROCESS DEFINITION 16-SEP-1984 01:11:3 AX/VMS Macro V04-0 Page 34 S 
v0e-600 IMAGE ACTIVATOR CONTEXT PAGE et Beha Leys VSRCTSECL MARS (1) vi 
1? F ~SBTTL IMAGE ACTIVATOR CONTEXT PAGE 
1436 ; IMAGE ACTIVATOR CONTEXT PAGE 
14 8 : The following page contains image activator context that must 
1439 ; remain behin hy er an iagge is activated. The IAFLIST survives 
1440 ; across successive ogi vet ons. The IAFEXE and IAFMERGE Lists are 
1441 ; cleared when a new image gcttvasion is initiated. The FIXUP Link 
122 3 is cleared as soon as a given fixup pass completes. 
1444 joeeeeneen een en eee ----- ee wore reece ec sececese Seen rene renee nee e new enennenn= 
7FFE2E00 § 1922 «= IMGACTCTX ; Point to start of area 
E 1249 CTLSGL_IAFLINK:: ; Listhead of Linked List of fixup vectors 
7FFE2E04 : 1308 -BLKL 1 ; (containing shareable image Lists) 
E04 1450 CTLSGL_IAFLAST:: ; Address of last fixup vector in List 
7FFE2E08 34 +3 -BLKL 1 ; (used in normal and merged image activati 
EOS 1°38 *T! SGL_FIXUPLNK:: ; Listhead of Linked List of fixup 
7FFE2E0C she 1228 -BLKL 1 ; vectors used during fixup pass 
44 1228 CTLSGL_P1MERGE: : ; Listhead of Linked List of fixup vectors 
7FFE2E10 at 132 mae 3 : for images merged into P1 space 
34 1439 ; The following data structure is an oapty fixup vector that facilitates 
E10 1460 ; the fixup vector List manipulation. It is plugged into the fixup vector 
4H) 199) ; lists by PROCSTRT when a process is first created. 
E18 1288 CTLSGL_IAFPERM:: 
7FFE2E50 E19 1464 -BLKB IAFSK_LENGTH 
E50 1996 ; The following Label locates the Link field in the just allocated structure. 
£28 1467 ; While an image is active, it locates the fixup vector for an executable image. 
E38 1298 :; It is cleared as part of the image activation initialization code path. 
7FFE2E10 # 1309 CTLSGL_IAFEXE == CTLSGL_IAFPERM + IAFSL_IAFLINK 
E50 1472 IACSGL_IMAGCTX:: 
7FFE2E54 ER? 1478 ~ a . 49 ; Context that exists for Life of image 
E54 1475 IACSGL_PROCCTX:: 
7FFE2E58 i 1028 " ih. 7 ; Context that exists beyond image exit 
E 1478 IACSAL_VECADOR:: 
7FFE2E68 52 1479 “ .BLKL 4 ; Array of altered opcode addresses 
E68 14 ? IACSAL_VECOPCOD:: 
7FFE2E6C Fe, 1? § -BLKB 4 ; Array of saved opcodes 
E6C 1484 IACSAW_VECRESET:: 
7FFE2E74 eet 1? 5 -BLKW 4 ; Array of offsets used to reset vectors 
E74 14 5 IACSAW_VECSET:: 
7FFE2E7C eve 1 3 -BLKW 4 ; Array of offsets used to locate vectors 
E7C 1490 ; The following Linked List contains image control blocks for all of the 
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ONTEXT PAGE P= SYS. SRCJSHELL.MAR 
images currently mapped into a process’ address space. 
ACSGL_IMAGE _LIST:: 
-BLKC 2 


pone ee 


; Room for forward and backward Links 


; The following Linked List is used by the image set tvator to record work 
; in progress. It is empty while an image is executing. 


IACSGL_WORK_LIST:: 
-BLRL 2 3; Room for forward and backward Links 


3; The vot tewtng List is a potential source of unused image control blocks. 
y 


; Although empty when a process is created, it grows to reflect the Largest 
3 number of images activated at the same time. 


IACSGL_ICBFL:: 
-BLKL 2 3; Room for forward and backward Links 


; The following two cells locate the ICB for the main image and the ICB for 
3; the image most recently merged into the address space. 


IACSGL_MAIN_ICB:: 
-BLRL 1 ; ICB of main image 


IACSGL_FIRST_ICB:: 
-BLKC 1 ; ICB of image just merged 


IACSGL_STACK_SIZE:: 
-BLKC 1 
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; Amount by which to expand user stack 
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SHEL PROCESS DEFINITION 16-SEP-1984 01:11:3 AX/VMS Macro V04-0 i 
Son ¢bo0 IMAGE AC if CONTEXT PAGE $78 P1984 eR oe hi POTS eR CTSMECL MARC ter 4, 
EA 
A IFT 3; IF USRVECTOR MODULE: 
EA : 
EA ; These symbols (SYS$...) specify which cells in the P1 pointer page may 
EA 3; be used b ony progres. regardless of system version, without having 
A ; to Link with SYS.STB (and thus, make it system dependant). 


MACRO USRSYM SYM,VALCHECK,CTLSYM 


cIF 8 

SYSS'SYM == CTLS'SYM 
IF NB, VALCHECK 
c IF NE. CTLS'SYM'="X" VALCHECK' 

~ERROR ; *t* CTL$S'SYM’ MUST EQ *X'VALCHECK' TO REMAIN COMPATIBLE WITH PREVI 


~IFF 
SYSS"SYM == CTLS'CTLSYM 
IF NB, VALCHECK 
lf NE ,CTLS*CTLSYM'=“X*VALCHECK’ 
ERROR ; *#* CTLS'CTLSYM' MUST EQ “X*VALCHECK' TO REMAIN COMPATIBLE WITH PR 


-DISABLE TRACEBACK 


USRSYM eg ie ts : .ddress of 2 pages of -_ storage 
USRSYM a tate “eg St 4 = + Points to IMGACT fixup Listhead 
USRSYM GL_IMGLSTPTR,7FFEFE84 ; Points to ICM List (for debugger) 


-ENDC ; END OF SHELL / USRVECTOR CONDITIONAL 
~ END 
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Symbol table 
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Symbol table 
EXESEXCPTNE 


EXESPROCSTRT 
piLeet DDSTRING 
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FWASC MAXDIRLEN 
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1ACSAL VECOPCOD 
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SHELL 
Psect synopsis - SYS.SRCJSHELL.MAR; (1) 


eon namescannceae $ 


H Psect synopsis ! 


eaonee eewsnaeacee= + 


PSECT name Allocation PSECT No. Attributes 
. ABS . 0009900 ( 0.) 9 ( Q.) NOPIC USR ABS LCL NOSHR NOEXE NO NOWRT wove’ BYTE 
SABS$ f (eee ,) ( 1.) NOPIC USR CON ABS LCL NOSHR- EXE RD WRT NOVEC BYTE 
AE XENONPAGED 8° ° + 83 ( 4.) § ( §°} NOPIC  USR CON’ REL LCL NOSHR' EXE RD WRT NOVEC BYTE 
YYSHELLPAGED 0 ( 3584.) ( -) NOPIC  USR CON REL LCL NOSHR’- EXE RD WRT NOVEC PAGE 
¢oeeeeeeea wane eee eroanenses } 
! ; Performance indicators ! 
Phase Page faults CPU Time Elapsed Time 
Initialization 3 0:00: 8.09 0:00: 66 
poanens processing 12% BR: 0:00.65 $: + 2°56 
Syabol, table sort *~ a: 6; 2:12 0: 0: 3-46 
Symbol table output 39 : 8; 0.36 0:00: 6:88 
Psect synopsis output 3 0:00:00. f 0:00: 3-8 
Cross-reference output 9 Ss es 4 0:00: 2-9 
Assembler run totals 98 0:00:28.61 0:01:35.14 


The working set Wy: was 1950 pages. 

115790 bytes (227 pages) of virtual memory were used to buffer the intermediate cod 

There were 80 pages of symbol table space a oecates to hold 1413 non-local and 18 local symbols. 
1560 source Lines were read in Pass 1, produci " 31 object records in Pass 2. 

37 pages of virtual memory were used to define 35 macros. 


Steer eee eames ec ewe er ee eee} 


Macro Library name Macros defined 
g2DuA Age: pt aoe ani 1 1 
SYS.0B 0B JL] MLB; 1 17 
33S UASS :CSYSLIB STARLET. ive: 32 7 
+3258 (all libraries) 25 


1360 GETS were required to define 25 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1S$:SHELL/OBJ=OBJ$:SHELL MSRC$:SHELL/UPDATE=(ENHS: SHELL) ¢EXECML$/LIB+SHRLIBS$:RMS.MLB/LIB 
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